﻿<%
Set RsNet=Server.CreateObject("ADODB.RecordSet")
strsql="select * from meng_Admin"
RsNet.Open strsql,conn,1,1
'以下值为False时网站此功能不显示***************************************
banben_China=RsNet("banben_China")     '中文版
banben_En=RsNet("banben_En")		  'Englsih版(网站是否有English版)
banben_Fa=RsNet("banben_Fa")	
'**********************************************************************
P_Item_B=RsNet("P_Item_B")
P_Name_B=RsNet("P_Name_B")				'产品名称
P_Register_B=RsNet("P_Register_B")			'是否会员产品
P_Index_B=RsNet("P_Index_B")				'是否首页产品
P_Content_B=RsNet("P_Content_B")			'备注
P_Other1_Name_B=RsNet("P_Other1_Name_B")		'后备字段1
P_Other2_Name_B=RsNet("P_Other2_Name_B")		'后备字段2
P_Other3_Name_B=RsNet("P_Other3_Name_B")		'后备字段3
'产品后备的三个字段名称*************************************************
P_Other1_Name=RsNet("P_Other1_Name")
P_Other2_Name=RsNet("P_Other2_Name")
P_Other3_Name=RsNet("P_Other3_Name")
'English版字段
P_Other1_Name_En=RsNet("P_Other1_Name_En")
P_Other2_Name_En=RsNet("P_Other2_Name_En")
P_Other3_Name_En=RsNet("P_Other3_Name_En")
'***********************************************************************
About_B=RsNet("About_B")
'***********************************************************************
Products_R_B=RsNet("Products_R_B")
Products_B=RsNet("Products_B")
Products_B_more=RsNet("Products_B_more")
News_B=RsNet("News_B")
Orders=RsNet("Orders")
Register_B=RsNet("Register_B")
Job_B=RsNet("Job_B")
GuestBook_B=RsNet("GuestBook_B")
Vote_B=RsNet("Vote_B")
Vote_en_B=RsNet("Vote_en_B")
Link_B=RsNet("Link_B")
meng_admin_B=RsNet("meng_admin_B")
Honor_B=RsNet("Honor_B")
DownLoad_B=RsNet("DownLoad_B")
video_B=RsNet("video_B")
Music_B=RsNet("Music_B")
quanxian_B=RsNet("quanxian_B")
Pic_B=RsNet("Pic_B")

Web_Add_B=RsNet("Web_Add_B")
Web_Lxr_B=RsNet("Web_Lxr_B")
Web_Phone_B=RsNet("Web_Phone_B")
Web_Fax_B=RsNet("Web_Fax_B")
Web_LeaguePhone_B=RsNet("Web_LeaguePhone_B")
Web_Serverphone_B=RsNet("Web_Serverphone_B")
Web_http_B=RsNet("Web_http_B")
Web_Mail_B=RsNet("Web_Mail_B")
Web_Mobilephone_B=RsNet("Web_Mobilephone_B")
Web_Zipcode_B=RsNet("Web_Zipcode_B")
Web_Wenti_B=RsNet("Web_Wenti_B")
Web_Daan_B=RsNet("Web_Daan_B")
N_Index_B=RsNet("N_Index_B")
N_top_B=RsNet("N_top_B")
Banner_link_B=RsNet("Banner_link_B")
Banner_content_B=RsNet("Banner_content_B")
Banner_B=RsNet("Banner_B")
equipment_B=RsNet("equipment_B")
news_en_B=RsNet("news_en_B")
news_fa_B=RsNet("news_fa_B")
hr_en_B=RsNet("hr_en_B")
hr_fa_B=RsNet("hr_fa_B")
P_Added_B=RsNet("P_Added_B")
Web_QQ_B=RsNet("Web_QQ_B")
Meta=RsNet("Meta")
DownLoad_jiandan=RsNet("DownLoad_jiandan")
Web_MSN_B=RsNet("Web_MSN_B")
Web_Skype_B=RsNet("Web_Skype_B")
'***********************************************************************
call rsclose(RsNet)
Const IMS_CookieRndString="B4kFqlBxoogKp8d6b5cf"
if quanxian_B=true then

set Rsq=server.createobject("adodb.recordset")
sql="select quanxian from [system_meng] where admin_user='"&request.Cookies("administrator")&"'"
Rsq.open sql,conn,1,1
if not (Rsq.bof and Rsq.eof) then	
qx=Rsq("quanxian")
end if
call rsclose(Rsq)

else
qx="$1$, $2$, $3$, $4$, $5$, $6$, $7$, $8$, $9$, $10$, $11$, $12$, $13$, $14$, $15$, $16$, $17$"
end if
%>